home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Complete Linux
/
Complete Linux.iso
/
docs
/
apps
/
circuits
/
spice2g6.z
/
spice2g6
/
spice
/
Fortran
/
crunch.f
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Text File
|
1989-02-03
|
340 b
|
11 lines
subroutine crunch
implicit double precision (a-h,o-z)
c spice version 2g.6 sccsid=memmgr 3/15/83
common /memmgr/ cpyknt,istack(1),lorg,icore,maxcor,maxuse,memavl,
1 ldval,numblk,loctab,ltab,ifwa,nwoff,ntab,maxmem,memerr,nwd4,
2 nwd8,nwd16
call comprs(0,ldval)
call memadj
return
end